home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / cafe / ultslots.dir / 00311_SLOTKEYS.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  353 b   |  19 lines
  1. on SlotKeys
  2.   if the keyCode = 49 then
  3.     unsetQT(5)
  4.     go("START")
  5.   end if
  6.   if the commandDown and (the key = "g") then
  7.     unsetQT(5)
  8.     giveCoin()
  9.   end if
  10.   if the commandDown and (the key = "j") then
  11.     unsetQT(5)
  12.     spinJack()
  13.   end if
  14.   if the commandDown and (the key = "q") then
  15.     puppetPalette("System - Win")
  16.     quit()
  17.   end if
  18. end
  19.